home *** CD-ROM | disk | FTP | other *** search
/ IBM InfoROM for OS/2 Beta 1995 January / IBM InfoROM for OS2 Beta 1-1995.ISO / testcert / mmedia / system / ap2 / scripts / wp8____1.p2s < prev    next >
Encoding:
Text File  |  1994-04-27  |  2.5 KB  |  98 lines
  1. ###########################################################################
  2. # OBJECTIVE: Typical custumer usage
  3. #
  4. # Description:  Open a single instance of the digital audio player, load,
  5. # cue, play, pause, seek, resume, stop,
  6. # the digital audio player.
  7. #
  8. #
  9. ###########################################################################
  10. #
  11. ############################################
  12. #
  13. #   OPEN THE DIGITAL AUDIO PLAYER
  14. #   WAIT FOR SUCCESSFUL OPEN
  15. #
  16. ############################################
  17. #
  18. open waveaudio00 alias wave1 notify
  19. +MM_MCINOTIFY MCI_NOTIFY_SUCCESSFUL MCI_OPEN #1
  20. @WAIT_NOTIFY 1 45000
  21. acquire wave1
  22. @WAIT_PASSDEVICE wave1 60000
  23. #
  24. ############################################
  25. #
  26. #   LOAD AND CUE 8B22KS.WAV FILE
  27. #   PLAY 8B22KS.WAV FILE AND EXPECT AN
  28. #   ABORT FROM A SEEK
  29. #
  30. ############################################
  31. #
  32. load wave1 ?AP2PATH?8B22KS.WAV notify
  33. +MM_MCINOTIFY MCI_NOTIFY_SUCCESSFUL MCI_LOAD #2
  34. @WAIT_NOTIFY 2 30000
  35. cue wave1 output notify
  36. +MM_MCINOTIFY MCI_NOTIFY_SUCCESSFUL MCI_CUE #3
  37. @WAIT_NOTIFY 3 30000
  38. play wave1 from 10 to 25000 notify
  39. +MM_MCINOTIFY MCI_NOTIFY_ABORTED MCI_PLAY #4
  40. #
  41. ############################################
  42. #
  43. #   SEEK TO 5 SECONDS
  44. #   PLAY DIGITAL AUDIO PLAYER AND EXPECT
  45. #   AN ABORT FROM A STOP
  46. #
  47. ############################################
  48. #
  49. set wave1 time format milliseconds wait
  50. status wave1 time format wait
  51. =milliseconds
  52. seek wave1 to 5000 notify
  53. +MM_MCINOTIFY MCI_NOTIFY_SUCCESSFUL MCI_SEEK #5
  54. @WAIT_NOTIFY 5 30000
  55. status wave1 position wait
  56. =5000
  57. seek wave1 to 0 wait
  58. status wave1 position wait
  59. =0
  60. @WAIT_NOTIFY 4 30000
  61. play wave1 notify
  62. +MM_MCINOTIFY MCI_NOTIFY_ABORTED MCI_PLAY #6
  63. @PAUSE 2000
  64. #
  65. ############################################
  66. #
  67. #   PAUSE, RESUME, AND STOP THE
  68. #   DIGITAL AUDIO PLAYER
  69. #
  70. ############################################
  71. #
  72. pause wave1 notify
  73. +MM_MCINOTIFY MCI_NOTIFY_SUCCESSFUL MCI_PAUSE #7
  74. @WAIT_NOTIFY 7 30000
  75. status wave1 mode wait
  76. =paused
  77. @PAUSE 2000
  78. resume wave1 notify
  79. +MM_MCINOTIFY MCI_NOTIFY_SUCCESSFUL MCI_RESUME #8
  80. @WAIT_NOTIFY 8 30000
  81. status wave1 mode wait
  82. =playing
  83. @PAUSE 5000
  84. stop wave1 notify
  85. +MM_MCINOTIFY MCI_NOTIFY_SUCCESSFUL MCI_STOP #9
  86. @WAIT_NOTIFY 9 30000
  87. @WAIT_NOTIFY 6 30000
  88. #
  89. ############################################
  90. #
  91. #   CLOSE THE DIGIAL AUDIO PLAYER AND
  92. #   EXPECT A SUCCESSFUL CLOSE
  93. #
  94. ############################################
  95. close wave1 notify
  96. +MM_MCINOTIFY MCI_NOTIFY_SUCCESSFUL MCI_CLOSE #10
  97. @WAIT_NOTIFY 10 30000
  98.